home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Multimedia / A-P / Net Game.sit / Net Game folder / Net Game / printing the script... / 00029.ls < prev    next >
Encoding:
Text File  |  1994-10-24  |  326 b   |  14 lines
  1. on mouseUp
  2.   global start_page, end_page, iscript, text_cast, page_cast, page
  3.   repeat with i = start_page to end_page
  4.     put getAt(iscript, i + 1) into field text_cast
  5.     if i = 0 then
  6.       put " " into field page_cast
  7.     else
  8.       put i into field page_cast
  9.     end if
  10.     printFrom(5, 5)
  11.   end repeat
  12.   go("menu")
  13. end
  14.